home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / umich / utils / autocopy.arc / AUTOCOPY.DOC next >
Text File  |  1987-03-13  |  2KB  |  42 lines
  1. This program copies files from one disk to another at run time.  It uses F_READ
  2. and F_WRITE in Personal Pascal to copy the files quickly.  To use this program
  3. place this file and the file 'AUTOCOPY.INF' together in the same folder.  The
  4. format for the info file is a follow:
  5.  
  6. Path_name of source, one or more spaces, Path_name of destination.
  7.  
  8. For example, to use my pascal I setup a 312K ramdisk as drive C: and then copy
  9. the important file to it and run them from there, this greatly improves my
  10. compile and link times by getting the files from ramdisk.  The info file I use
  11. is as follows:
  12.  
  13. A:\PASCAL\COMPILER.PRG  C:\COMPILER.PRG
  14. A:\PASCAL\EDITOR.PRG    C:\EDITOR.PRG
  15. A:\PASCAL\LINKER.PRG    C:\LINKER.PRG
  16. A:\PASCAL\PASCAL.PRG    C:\PASCAL.PRG
  17. A:\PASCAL\PASCAL.RSC    C:\PASCAL.RSC
  18. A:\PASCAL\PASCAL.INF    C:\PASCAL.INF
  19. A:\PASCAL\ERRORS.TXT    C:\ERRORS.TXT
  20. A:\PASCAL\PASGEM        C:\PASGEM
  21. A:\PASCAL\PASLIB        C:\PASLIB
  22. A:\PASCAL\GEMCONST.PAS  C:\GEMCONST.PAS
  23. A:\PASCAL\GEMSUBS.PAS   C:\GEMSUBS.PAS
  24. A:\PASCAL\GEMTYPE.PAS   C:\GEMTYPE.PAS
  25. A:\PASCAL\JOYSTICK.PAS  C:\JOYSTICK.PAS
  26. A:\PASCAL\JOYSUBS.O     C:\JOYSUBS.O
  27.  
  28. I have also included my joystick routines in this archive, you will need the
  29. object file 'JOYSUBS.O' from the archive 'JOYSTICK.ARC' on GEnie.  See those
  30. instructions for use of its routines.  The include file 'JOYSTICK.PAS'
  31. contains routines to check the fire button, return the change in the
  32. horizontal and verticle directions.  They are as follows:
  33. FUNCTION STRIG(WHICH_STICK: INTEGER): BOOLEAN;
  34. returns true if the button on the stick is pressed, false otherwise
  35.  
  36. FUNCTION H_STICK(WHICH_STICK: INTEGER): INTEGER;
  37. return -1 if the stick is left, +1 if the stick is right, and 0 otherwise
  38.  
  39. FUNCTION V_STICK(WHICH_STICK: INTEGER): INTEGER;
  40. return -1 if the stick is up, +1 if the stick is down, and 0 otherwise
  41.  
  42.